run_shinyBN <- function(){
  shiny::runApp(system.file('shinyApp',package = "shinyBN"))
}
